

addHook("PlayerThink", function(player)
-----------------	
	if gamemap != 778 --showmap
	return end
	if player.leveleffects == true
		P_LinedefExecute(221, player.mo)
	end
end
)




freeslot(

	"MT_OCEAN",
	"S_OCEAN",
	"sfx_ocean"

)



mobjinfo[MT_OCEAN] = {
	doomednum = 670,
	spawnstate = S_OCEAN,
	seestate = S_OCEAN,
	radius = 64*FRACUNIT,
	flags = MF_NOGRAVITY|MF_NOCLIP|MF_NOBLOCKMAP|MF_NOCLIPTHING|MF_NOCLIPHEIGHT|MF_SCENERY|MF_SPECIAL
}

states[S_OCEAN] = {SPR_NULL, A, 1, A_None, 0, 0, S_OCEAN}

addHook("MobjThinker", function(mobj,player)
	for player in players.iterate
		
		local mobjrange = R_PointToDist2(player.mo.x, player.mo.y, mobj.x, mobj.y)
		
		if mobjrange <= 2000*FRACUNIT		---if youre at a certain distance...
		and not S_SoundPlaying(player.mo, sfx_ocean)
			S_StartSound(player.mo, sfx_ocean, player)
		end
	end
end,MT_OCEAN
)

freeslot(
	"MT_PEGUUINO",
	"SPR_PEGU",
	"S_PEGU1",
	"S_PEGU2",
	"S_PEGU3",
	"S_PEGU4",
	"S_PEGU5"
)

mobjinfo[MT_PEGUUINO] = {
	doomednum = 2843,
	spawnstate = S_PEGU4,
	seestate = S_PEGU4,
	deathstate = S_PEGU2,
	radius = 32*FRACUNIT,
	height = 80*FRACUNIT,
	flags = MF_SPECIAL|MF_RUNSPAWNFUNC|MF_NOGRAVITY|MF_NOCLIP
}
states[S_PEGU4] = {SPR_PEGU, A, 2, A_None, 0, 0, S_PEGU1}
states[S_PEGU1] = {SPR_PEGU, A, 1, A_None, 0, 0, S_PEGU1}
states[S_PEGU2] = {SPR_PEGU, A, 1, A_None, 1, 1, S_PEGU3}
states[S_PEGU3] = {SPR_NULL, A, 1, A_SpawnFreshCopy, 0, 0, S_NULL}
states[S_PEGU5] = {SPR_PEGU, B, 1, A_None, 0, 0, S_PEGU5}
addHook("MobjThinker", function(mobj)
	if not (mobj and mobj.valid)
		return end	
	if multiplayer == true
		mobj.state = S_PEGU5
		mobj.flags = $|MF_SCENERY & ~MF_SPECIAL
	return end
	mobj.shadowscale = 1*FRACUNIT

end,MT_PEGUUINO
)
